home *** CD-ROM | disk | FTP | other *** search
/ The Best of MacTutor - S…e Code for Volumes 1 to 5 / The Best of MacTutor - Source Code for Volume 1-5 (Wayzata Technology)(6031)(1990).bin / Source Code / #18 (Mar 87) / Printer MPW sources / PrintTest.r < prev    next >
Text File  |  1987-02-12  |  3KB  |  164 lines
  1. /* @(#) PrintTest.r 11/30/86
  2.     {Sources}PrDrvr:PrintTest.r
  3.  
  4.        Copyright © 1986 Joel West, Western Software Technology
  5.                  for MacTutor
  6. */
  7.  
  8.  
  9. resource 'STR ' (0, purgeable) {
  10.     "PrintTest by Joel West\nVersion 1.0: 30-Nov-86"
  11. };
  12.  
  13. resource 'ALRT' (256, purgeable) {
  14.     {40, 131, 140, 381},
  15.     256,
  16.     OK, visible, silent,
  17.     OK, visible, silent,
  18.     OK, visible, silent,
  19.     OK, visible, silent
  20. };
  21.  
  22. resource 'ALRT' (257, purgeable) {
  23.     {100, 160, 200, 352},
  24.     257,
  25.     OK, visible, 2,
  26.     OK, visible, 2,
  27.     OK, visible, 2,
  28.     OK, visible, 2
  29. };
  30.  
  31. resource 'DLOG' (258, purgeable) {
  32.     {100, 120, 200, 392},
  33.     dBoxProc,
  34.     visible,
  35.     noGoAway,
  36.     0x0,
  37.     258,
  38.     " "
  39. };
  40.  
  41. resource 'DITL' (256, purgeable) {
  42.     {    {60, 105, 80, 175},
  43.     Button { enabled, "OK" };
  44.     {10, 64, 42, 264},
  45.     StaticText { disabled, "^0" }
  46.     }
  47. };
  48.  
  49. resource 'DITL' (257, purgeable) {
  50.     {    {70, 60, 90, 130},
  51.     Button { enabled, "OK" };
  52.     {10, 64, 58, 172},
  53.     StaticText { disabled, "Printing error, ID = ^0." }
  54.     }
  55. };
  56.  
  57. resource 'DITL' (258, purgeable) {
  58.     {    {15, 40, 85, 232},
  59.     StaticText { disabled,
  60.              "^0^1^2^3…\n\n"
  61.              "To cancel, type \0x11-." }
  62.     }
  63. };
  64.  
  65. resource 'MENU' (1, preload) {
  66.     1,
  67.     textMenuProc,
  68.     0x7FFFFFFD,
  69.     enabled,
  70.     apple,
  71.     {    "About PrintTest…", noIcon, noKey, noMark, plain;
  72.     "-", noIcon, noKey, noMark, plain
  73.     }
  74. };
  75.  
  76. resource 'MENU' (2, preload) {
  77.     2,
  78.     textMenuProc,
  79.     0x7FFFFEDA,
  80.     enabled,
  81.     "File",
  82.     {    "New", noIcon, noKey, noMark, plain;
  83.     "Close", noIcon, noKey, noMark, plain;
  84.     "-", noIcon, noKey, noMark, plain;
  85.     "PrStlDialog…", noIcon, "S", noMark, plain;
  86.     "PrJobDialog…", noIcon, "J", noMark, plain;
  87.     "-", noIcon, noKey, noMark, plain;
  88.     "Page Setup…", noIcon, noKey, noMark, plain;
  89.     "Print…", noIcon, "P", noMark, plain;
  90.     "-", noIcon, noKey, noMark, plain;
  91.     "Quit", noIcon, "Q", noMark, plain
  92.     }
  93. };
  94.  
  95. resource 'MENU' (3, preload) {
  96.     3,
  97.     textMenuProc,
  98.     0x7FFFFFFD,
  99.     enabled,
  100.     "Edit",
  101.     {    "Undo", noIcon, "Z", noMark, plain;
  102.     "-", noIcon, noKey, noMark, plain;
  103.     "Cut", noIcon, "X", noMark, plain;
  104.     "Copy", noIcon, "C", noMark, plain;
  105.     "Paste", noIcon, "V", noMark, plain;
  106.     "Clear", noIcon, noKey, noMark, plain
  107.     }
  108. };
  109.  
  110. resource 'STR ' (256, purgeable) {
  111.     "Page "
  112. };
  113.  
  114. resource 'STR ' (300, purgeable) {
  115.     "Preparing document for printing"
  116. };
  117.  
  118. resource 'STR ' (301, purgeable) {
  119.     "Now printing page "
  120. };
  121.  
  122. resource 'STR ' (302, purgeable) {
  123.     "Now spooling page "
  124. };
  125.  
  126. resource 'STR ' (303, purgeable) {
  127.     " of "
  128. };
  129.  
  130. resource 'STR ' (304, purgeable) {
  131.     "Now printing spooled document"
  132. };
  133.  
  134. resource 'STR#' (256, purgeable) {
  135.     {"scanTB"; "scanBT"; "scanLR"; "scanRL"}
  136. };
  137.  
  138. resource 'STR#' (257, purgeable) {
  139.     {"feedCut"; "feedFanfold"; "feedMechCut"; "feedOther"}
  140. };
  141.  
  142. resource 'STR#' (258, purgeable) {
  143.     {"screen"; "Imagewriter"; "Daisywriter"; "LaserWriter"}
  144. };
  145.  
  146. resource 'STR#' (259, purgeable) {
  147.     {"bDraftLoop"; "bSpoolLoop"}
  148. };
  149.  
  150. resource 'STR#' (260, purgeable) {
  151.     {"false"; "true"}
  152. };
  153.  
  154. resource 'WIND' (256, purgeable) {
  155.     {46, 8, 327, 507},
  156.     noGrowDocProc,
  157.     visible,
  158.     goAway,
  159.     0x0,
  160.     "PrintTest"
  161. };
  162.  
  163.  
  164.